home *** CD-ROM | disk | FTP | other *** search
/ Exploring Where & Why / Exploring Where & Why.iso / pc / MODULES / LESSON08 / ACT08B / COMMON8 / 00043_Script_go to continent < prev    next >
Encoding:
Text File  |  1998-10-02  |  319 b   |  15 lines
  1. on mouseUp me
  2.   global gContinent,gContSpr
  3.   set spr=the spriteNum of me
  4.   set gContSpr=spr
  5.   puppetSprite spr,true
  6.   --  if bounceButton(spr) then
  7.   set gContinent=the name of the member of sprite spr
  8.   go to frame gContinent
  9.   set the loc of sprite spr=point(1000,1000)
  10.   updateStage
  11.   --  end if
  12. end
  13.  
  14.  
  15.